﻿Imports extranet.BC
Imports extranet.BE
Imports System.Collections.Generic

Partial Class PubEntrada
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            'Dim lstBEEventosFiltrados As New List(Of BEEvento)
            'Dim lstBEEventos As List(Of BEEvento) = BCEvento.ListarEvento(True)
            'Dim count As Integer = 0

            'For Each objBEEvento As BEEvento In lstBEEventos
            '    If count < 3 Then
            '        If objBEEvento.Banner <> "" Then
            '            lstBEEventosFiltrados.Add(objBEEvento)
            '        End If
            '    End If
            'Next
            'grvEventos.DataSource = lstBEEventosFiltrados
            'grvEventos.DataBind()
        End If
    End Sub

End Class
